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Crystal Reports 
ASP.NET 


إعداد المهنشدس/ 


بکالوریوس نظم معلومات 
دبلوم علوم حاسوب 
Emall: - nabil299@ Gmail .Com‏ 
إشراف الدكتور/ 


عمار الحرازي 


n e e 


أتقدم بالشكر الجزيل للدكتور الفاضل/ 
عمار الحرازي 
على ما بذله من جهد كبير معنا في تقنية 
(ASP.NET)‏ 
وعلی ما يقدمه لنا من توجیهات ونصائح قيمه 
وعلى المتابعة الحثيثة منه وذلك بغرض رفع مستوانا 2 


كما أشكر هذا الموقع المتميز كتب 0 


التواصل مع القراء 


إلى القارئ العزيز 


حرصت.. ومن منطلق اهتمامي العام بعلوم الحاسب والتقنية واهتمامي الخاص بتقديم هذه 
العلوم باللغة العربية .. على طرح هذه السلسة من الكتب الإلكترونية التى أتمنى أن تحقق 
طموحات القارئ العربي الذى اعتاد على قراءة أجود المطبوعات بكافة اللغات العالمية ... من 
خلال هذه السلسلة .. أطمح لتقديم سلسلة من الكتب بمستوى عال من الجودة › الشيء الذى لن 
يتحقق بدون ملاحظاتكم واقتراحاتكم حول السلسلة .. طريقة الكتابة › الأخطاء الإملائية 
والنحوية › التنظيم والترتيب ... الخ 


ننتظر سماع أراءكم على البريد الإلكتروني المخصص لذلك... 


nabi11299 @ Gmail.com 


شرح طريقة اضافة تقرير Crystal Reports‏ في أ C#.NET‘VB.NET jıتغئll IS ASP.NET‏ 


في البداية أحبيت أن أطرح هذا الموضوع لكي يستفيد منه الكثير من الطلاب.. ولاحظت انه لا توجد مصادر 
كثيرة او شروحات لهذا الشيء .. فقلت لما لا اضع هذا الشيء ›» وبما اني اعرفه جيداً ليستفيد منه الغير .. 
,وقد شجعني على ذلك سؤال أخي الطالب المتميز أحمد الصنعاني عن كيفية اضافة تقرير اهائءرا€ 
04ء R‏ في ال ۸SP.N٤1‏ فقمت بإعداد هذا الكتاب الذي بين يديك 


سوف نقوم بكتابة الكود على كلا اللغتين ال ۷B. N.٤۲ ad C#.N٤ِ‏ لتعم الاستفادة للجميع .. 
اولاً سوف نقوم بالتطبيق على أ ASP.NET VB.NET‏ 


افتح ال 2008 Microsoft Visuaا Studio‏ واختر من 


Ta Start Pape - Microsoft Visual Studio 


Filz | EdiE با‎ Tools window ommunikr Help 


F lif] Projert... crerl+5RiFF+P4‏ بل 
è>b Site...‏ ا pen ٢‏ 
Clase 1 File... rrrl+I‏ 


Project Frorn Existing Lode... 


ثم بعد ذلك سوف تظهر لك نافذة أنشاء ویب جدید .. اختر منھا ۸SP.NE ۲ Web Sie‏ مع التاکد من ال 
Visual Basic kil Language‏ 

File System ان4‎ location |آ‎ dلذكو‎ 

Visual Studio 2008 مجلد ال‎ „Nly Documents 


New Web Site 


Templates: 
Yisual Studio installed templates 


TR ASP.NET Web Site EÊ ASP.NET Web Service Personal Web Site Starter Kit 
I Empty Web Site AR ASP.NET Lrystal Reports Web Site 


_ My Templates 


ul search Online Templates, ,. 


| ã blank ASP.NET Web site 


Location: File System يه‎ | Documents and 5ettings1FunctionSys{y Documents Yisual SEuIr يه‎ 


Language! Wisulaãl Basic ا‎ 


| ancel 


ثم اضغط على )0 لكي يتم انشاء الموقع ... 
طيب الان لا بد من وجود داتا بيس .. ليكي يتم الاتصال بها .. 
أنشأ داتا بيس بأي اسم يعجبك .. وانا عن نفسي انشات داتا بیس باسم 1ل من نوع †؟s0٥cr‌Ni‏ 
Access‏ 
وكذلك انشا جدول بأي اسم .. وانا انشات جدول باسم ٤٥ا٣‏ _اط] للعملاء.. 
وكذلك انشا حقول في الجدول على حسب متطلباتك .. وعن نفسي انشات هذه الحقول.. 
AutoNumber Eggi ja ID‏ 
Textggi ùjaC_ Name‏ 
jaC_ Phone‏ giعTextg‏ 
jC Address‏ giعTexig‏ 


ڪڪ 


MMAiîicrosoTt hicCccess 
F5 File Edit wim Insert Tools window Help 


5 dbl : Database (Access A000 file Tormat ] 


EBS tbI Client : Table 


| Fil EHame: | ES Ea Tp 
A Eo JLIrnber 
Text 
Tex 
| TezrFE 


بعد انشاء الداتا بيس .. اضف فيها بيانات مبدئية لكي نعرضها في التقرير .. فيما بعد .. 
الان قم بنسخ الداتا بيس لديك إلى المشروع .. وضعها في مجلد ال ة0 _مم۸ وهذا المجلد موجود في ال 


File >>> New >>> Web Site 
My DocumentsVisual Studio 2008Your WebSiteApp_ Data 


الان اذهب إلى المشروع لكي نقوم باضافة الکرستال ریبوت من خلال شریط الادوات ×0 ٣٥۵١۱8‏ اذهب إلى 
ادوات الکرستال ريبوت وهي تکون تحت کأم4 Crystal Reports‏ اضغط دبل كلك على الاداة 
CrystalReportViewer‏ 


H۴ r ES‏ ییا اا 


Foi tear‏ چ 


e Lrg sSEalHeEporP EYe yy ep 
ls] CrystalIREporESoOUFCA Wersion 10.2.3500. 0 From Businsss DbjeZE= 
| en r ھl‎ .TJET torn poneEenkE 


- mm 


سوف يتم ادراجها على الصفحة بهذه الصورة 


e e e 


Fs WebSiteRe port - Microsoft Visual Studio 


Filz EdiE با"‎ 'ebsitE Build GLebug ForrmakE Law oJ Tools inion 


l> س ا س س‎ E ا‎ Debug 
Fm | E IE E: 
ا‎ 
| 
ق‎ 7 
0 : LCrysEtalReportY¥ieyyer - r_rwstalReportYieyyer 1 | 
mm o | 
: Use Eha Report2ourceID property to specify a ReportSource control, 
Ti ل ي‎ 
ا‎ 
ا‎ 
| 
1 
Zr 
| 
Ez" - 


الان دع الاداة .. سوف نرجع لها لاحقاً ... 
اذهب إلى شریط الادوات .. سوف تری ایقونھ شکلھا مربع ... اضغط علیھا واختر منھا Add New‏ 
Item...‏ 


Ta WebSiteReport - Microsoft Visual Stu dio 


Filz EdiE با‎ "e bsikëE Build Debug Forrnak Lao JE Tools 


E-E “BS LEAN DB o HI Et 
)ر »س‎ dd Hews Item... cErl+shiFE+a E ا‎ 1 
Fm Tt Gd Existing Item... ShiFEt+aAlE+a, 
o Oe El. 
0 LCry¥sEalReporEY¥Yieyvyyer - _rystalEREporEwWizwyer 1 
8 : Ise Ehe REeportSourceID property Eo specify a ReportSouIrce control, 
<î Ta TT TEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EEE EE EE EE EE EE EEE EEE EOE EE EE EEE EEE EEE EE EE EE EEE EEE EEE EEE EEE EEE OEE EEE 
ا‎ | 


8 ا‎ Bee Eild "ab SiEm= 
== j= : 
ج‎ ¬ Fg blish MM" eb TICE 


[EEN ..‏ ل ليت 
Eis Einad LEE. ._‏ للت 
Jz Folder‏ 
S۴. E T7 Fol Aer‏ للت 


a lm Em 


EFF ECE...‏ طح "ی ليت 


ثم بعد ذلك سوف يظهر لك مربع حوار ۳٥ا ۸d NW‏ اختر منه امم ۱#هاsراC‏ واجعل اسمه 
الافتراضي كما هو 


n e e 


Yah Crystal Reports - Microsoft ual Studio 


Fils Edl Wie  Wfebzile Build Debug Tonal: Test Windom Help 
êz AES EH E N Ea El 2 u EI EL i Debug 
. Start Page| x | Solution Explorer Cn. Nwe. w FH Xx 
r" Solution WebCrmyatal Reportz' [1 pro 
B- ق‎ C1... YebCrystal Reports 


E iF ûpp_ÛData 
Bl 13| Default. aspx 


wd. webinfo 
23 web.config 


Microsoft® 


Visual Studio’ 2008 


Hecent Projects Yisual Studio Developer News 


|x 1 e |aatx3 ENE | 


[e] Themes and Skinz The current news channel might nol be a valid HSS Feed, or your Internet connection might be unavailable. To change the news 
Crystal Reports channel, on the Tools menu, click Options, then expand Environment and click Startup. 


TUDELIST 


Ad New lem - YDocumenis and SeltingsiAdmınıstratof{My Documenis{Yısual Studio 2... 


Ternplakez: 


Oper: Piajêél.., Yisual Studio Installed templates اس‎ 


Create: Project... 


îz] web Form O] Master Page Web Llser Control 
3] ûJd* Client Behavior 3 ] Ald? Client Control Bj dlê? Client Library 
Getting Started mw الیش‎ Master Page îz] Jd Web Form ê AJAjenabled WCF Service 
Dg] Browser File E] Class | Class Diagram 
Whal's new in Yisual Studio ZOU? Crystal Report || DataSet #] Generic Handler z 


Samples and Wwalkthroughz 


EL ا‎ Global Application Class la] HTML Page 8] JSeript File 
New Project From E wisting Code... ا‎ LIND ta SAL Classes Report 3 Report Wizard 
Hom Go |... ا‎ Resource File اا‎ Site Map E Skin File 
SHL Serwer Database E Style Sheet 8 Tent File 
Wg WEF Service By web Configuration File 1 Web Service 
Fa] XML File |ã] XML Schema EF #SLT File 2 


Hy Templates 


û, Lryatal Report file that publishes data to a Yin damws or web farm 


Hame: LrystalR apart. rpt 
Language: [|_| Place code in separate file 


| Select master page 


Properties 


Yısual Studio Headlines 


Thank you for using Yisual Studio 


El Deyveloper Web Seryer 

Always Start wh True 

Port nuarmber 1081 

LIse dynamic poı Tre 

YWirtaal path Fw ebLrystal Reports 
El Misc 

Full Path L'Documents ard 5 

DUpened URL HleiffF:F Documents 


ك الدروس الجاهزة لشنزيله .. 


Crystal Reports 5 Microsoft ¥Yisual Studio 


File E dif jE i a bzite Build Debug Toanls Test با ی‎ Help 
rE E E I“ NT NEE Ee GES EE #F Debug 


e ES > (Default Font] > ll(Default = 


۳ 
٣ 
3 
1 
E 


Document Outline HH x O CrystalReportrptl Default.asp«” | Start Page | x | Salution Euplorer - Solution '... w MH x 


There are no items to shows for the 


lected dı E | Solution 'Crystal Reports" [1 project] 
selected document. 1 


--- E GD: .-‘xCrgstal Reports" 
&.. gy App_Ûata 
ا‎ Db1.acedb 
3 CrystalR epaort.rpt 
BEÎ Default. aspx 
lğ web.config 


ano 1 Qf ema A2 ا‎ 


Crystal Reports End LJser License 


License Agreement 
Tou must agree with the lizense to proceed. 


CRYSTAL REPOETS BASIC FOR ICROS OFT VISUAL STUDIO 2008E LICENSE | 
& E REERIENT 


IHIPORTANT-READ CAREFULLY: THIS IS A4 LEGAL AGREEMENT EETIYEEN TOU 4ND 
BEUSIHESS ODEIETTS SOFTTARE LIMITED [("EUSIHNESS OEIETCTS"] FOR THE EUSINESS 
EIETTS SOFTWARE PFODULT IGCGEN TIFIED HEDOYE, HICH MAT IHNZTLUDE 

LORMIPT TER SOFTWARE, ASSOLIA TED MEDIA, PFIHNTED MATEFIALS AHD ONHLINE OR 
ELECTRONIC DOLUMEN TA TION ("SOF TTA RE". BEFORE LOM TINH UIHr WITH THE 
IHSTALL A TION OF THE SOFTWARE, TOU MUST FEAD, ALEHOWLEDGE AND ALLEPT 
THE TERMS AND ZONDITIOHS OF THE SOFT YARE LIZEHSE AGREEMENT THAT 
FOLLOS ("AGREEMENT"). IF TOU DO HOT ALLEPT THE TERMS AND CONDITIONS 
OF THE AGREEMENT, TOU MAT FETUFRNH, WITHIN THIRETT (30) DATS OF PURCHASE, 
THE SOFTIYTARE TO THE PLATE TOU OBTAINED IT FOF A FILL REFUND 


=] Solution E #plorer Eg Class Wie | 
1. GRANT OF LICENSE. Business Wbjects grants ou a nonexchısire and lbımited licenze to روت سک تس ن ہے ت و چ اس‎ 


(| accept the License Agreement Properties HM 


CO I Ha not accept the License A4qareement اا‎ 


ثم بعد ذلك اضغط على )© لكي يتم اضافة التقرير .. بعد ذلك سوف تظهر لك نافذة ال إهائرا٣‏ 
Reports Gallery‏ 


Lrystal Heporlts Gıallery 2 | ا‎ 


Feats a PJew rw slCtal Report DoculmmêEnk 


EE. de Jsing Eha FEeporE Wizard 


CI a= 3 Blank ReporE‏ اسا 


gH F3 FForm an ExisEing ReporE 


hûûû se arn Ex perE 


ll SEandard 
Bl c-ro=s-Tab 
13i Lab zl 


mUiJES Eha ZFEaEion oF a Ewpical reporE. 


دع الخيارات كما هي واضغط على زر 0٣‏ لكي تظهر لd‏ liفذö Standard Report Create‏ 
Wizard‏ 


J Standard Heport Creation Wizar ûd 


Datla 
—hoose the data oll want Eo report on, س‎ 


Available Data Sources: Selected Tables: 


ESE E Project Gata ا‎ 
E3 Current _DNnnECEiON=S 

E: Favorites ت‎ 

E: EA History 

EH: A 2reate New Connection ا‎ 


lنتق‏ llئخlıر Create New Connection‏ 
ثم انتق الخیار OLE DB ۸D0‏ 
سوف تظهر لك نافذة تحديد مزودات الربط بقواعد البيانات ... وبما اننا نستخدم مایکروسوفت اکس لابد من 
اختیار 
کود 
ur WebSite‏ ¥تعني اسم مشروعك الذي انشاته مسبقا 


Microsoft Jet 4.0 OLE DB Provider 


e e e 


J Standard Heporî Creation Wizard 


aE OLE DB {ADO} 


—_hoose Ehe data wou wad 


OLE GE FPFrFowidler 
SeEleZE a provider From Ehe lisEË or select a data link File. 
Hr ailabls Gata Sources: 


1 “JProaject Data : . 
a: ê Curent Cennet hS ET 
ا‎ : EIdlia_aEalog ar gE raider 
AF avorites MediaTataloawwebDB GOLE GDB Provider 
E IHistory MicrosaFE Jet 4.0 CLE DE Provider 
I Zreate PJs orn MicrosoFE FProwidear For Data Mining 5 
FI- IArrEeEs=s E = re| MicrosoFE Prowider For Indexing Ser —— 
E2 ۳ 
H- EI AaADD FET MicrosoFE Frowider For Internet Fuıbli 
E Lb ile MicrosoFE FProwider For DOB Grisers 
El ج‎ ALara EE 8 Micros oFE Frowider For DOLAP SerFwicE: 
EE-- S O ODE FE Ori Air maa mF Orem sil or Fm Tar ات‎ 
H.A OLE GE fab کت‎ Tili | 
EH lA More Gata 3r 
LIsëe Gata Link File: 


Micra s GFE Oat LIME-FEIlE: 


بعد اختيار المزود للاتصال اضغط على زر ٥×1‏ لكي تظهر لك نافذة تحديد قاعدة البيانات .. قم بتحديد 
القاعدة التي تم انشاءها مسبقا في بداية الشرح .. 


من خلال الضغط على الزر المقابل 
ائنفصض Database Name‏ 


J Standard Report Creation Wizard 
OLE DB (ADO) 


Connection Information 
Provide necessary information to log on Eo the chosen data source, 


Gatabaše Nare: 
Database Type: 


lser IU: 
Password; 


Jet System Catabase: 


JeE GCatabase Password: 


بعد تحديد الداتا بيس .. 


"8 =SEandlart Heport Lreation Wizar cl 
Kala 
whonsEs EL Aa su L5 ıı Du o : . 
OLE DB {ADO} EES 


LConnecEion Inform aliOrı‏ ااذ انت بت 
Prowidlë HEeECEssarY infForrnation Eo lOqA on Eo Ehe chosen Aata soUrCE.,‏ | 


Gatabase FJarme: wif GDocuments and SEEEing=EuncEian Sy 5y e N 


FPFasswıordl; 


Je System Database: ابا‎ 


JEE GCGaEabase Password: 


FREE 


الان اضغط على زر التالي ٥×٤‏ لكي تظهر لك النافذة التالية 


"Standard Report Lreation Wizard 


Gata 
_hoosey, Eha LaF rup 
OLE DB [(ADÛ} 
` عاطدذااة ست‎ AdYwanced Information 


LIpdate the property Yale bY double clicking Ehe property or select the property and 
press the "EdiE Yale" button. 


Locale IAênEiFiEF 
LE DE SeErYiCES= 


ûdi Property ... EdiE Yale ... EHermoye PropEerky' cel 


دع الخيارات كما هي .. واضغط على كلمه ٣وامآ۴‏ لكي ترجع إلى اول نافذة ومن خلالها يتم اظهار الجداول 
التي في الداتا بيس .. 


e e e 


قم بتحديد الجدول ٤٥ا٤‏ _اط] ثم اضغط على الزر الذي في الاعلى 


J Standard Heport Creation Wizar ûd 


Datla 

—_hoose Ehe data You want Eo report on. 1 
2wailable Data Sources: 3elected Tables: 

RET Project Gata 3 “Ê CM ODocuments and Settings{EFunrctionî| 

IH: 


[Current Connections i Ebl_CZlienE 
TT IFaworikes 1 

[History 

]: iC Create Jey _onineczEioan 
HIF AclcessfExcel (GAD) 


۴ 


1E 


+ 


[CA Catabase Files 
ODBC (RDO 
Z- OLE DE apa] 
`. Maks Mewy Connection 
3 E {Documents and Settings Fur!) 
Î Add Command 
ّ EbI_FClient 
fore Data Sources 


| > 


7 


El: 


لكي تم اختيار الجدول .. ومن ثم اضغط على زر ٥×‏ لكي تظهر لك نافذة تحديد الاعمدة المراد اظهارها في 
التقرير 


J Standard Heporî Creation Wizar d 


Fields 
—_hoose Ehe inforrnation Eto display on the report, 


awailabls Fields: 
ا‎ Ebl_lianE 

IL 
__ Jame 


_Phone 


__AdArEess 


Fields to Display: o 


118# 


Brasë Data. . Find Field... 


rT wem Tm mE 


قم بالضغط على زر لكي تم اضافة كل الاعمدة .. وفي حالة تريد فقط عدد من الاعمدة يمكنك تحديد واحدأ 
تلوا الآخر ... بعد تحديد الاعمدة .. قم بالضغط على زر التالي ×مN‏ سوف تظهر 
لك نافذة آخرى هنا یتم فیھا اذا كنت ترید عمل علاقات او قروب وغيرها .. دعها كما هي اضغط على × م 


n e e 


حتى تصل إلى تحديد شكل التقرير ... 
سوف تظهر لك نافذة تحديد الثيم للكرستال ريبوت ... اختر اي شكل مناسب لتقريرك .. 


> ELE Heport kLrealtion Wizard 


Report SEyYlE - 
select a Formatting stwle For Ehe report, L3 


awailabla SEYlEs Premji 


| standard 
| Leading Break. 
| Trailing Break. 
| Table 
| Drop Tablë 
| Executive, Leading Break. 
| Executiwe, Trailing Break 


E 


| M"Maroaonf Teal Box 


ثم بعد ذلك اضغط على زر طءآمآ۴ لكي يتم انشاء التقرير .. ووضع الحقول في التقرير وسوف يكون الشكل 
النهائي بهدا الشكل .. 


9 WebSiteReport - Microsoft Visual Studio 


Fils Edt ie Website Build Gebug Format Tools: Lrystal Reports Window  Lomrmunity Help 


Debug > ET >  [È} index_files‏ ا ا < ا ج ك ا د ا ا اعا ا ”ت ”لو 
: کڪ ڪڪ کڪ 1U + | H ۴2 U‏ = و 7 8 HE 3 E‏ = 3 
ت CrystalReport. ge “ Default, aspx | Start Page | a.‏ ; 


| I a IF i 1 


1 


N MS A MS I KS E O I LS E KS I O NA O I O E WS 
5 ection IF eport Header إ‎ 
ا‎ 


_y Secliong [Page Header ] 


Print Daf 


i b r 1 r "1 ۳ 1 
¥ Seclion3 [Details ] 
| ` ° O £_Name ` C_Phone ` C_Address 
w Sectond [Report Footer | 


| LLL ۳S 


¥ second | [age Footer | 


aa PEH E] [xa9011 E] EEE AAAS 


j8 Number 


وهذا هو شكل التقریر .. وشکله غير مثیر للاهتمام .. الان اذهب إلى صفحۂ ال ×موھ.۔]اںھ؟ م0 وقم 
بتحديد الاداة wW ٥۲1‏ ء0۲۷1 مء ۸# اهارا سوف يظهر لك الوسم الذكي .. على الاداة انتقه واختر 
من خلاJî‏ آ Choose Report Source‏ 


n e e 


# E Ol #2 (2 2 Hes Dg : ا ا‎ 


r o 


E 


8 mnmanmnannnnnnnnnnnnnnnnnnnannnnnnnnnmnnnnnnnnnannnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnrnnnnnnnnnnnnnnrnnnnnnnnnnnnnnnnnnnnnnnnninnnninnn 14l CrystalReport¥iewer Tasks 
: CrystalReport¥iewer - rystalReportYiewer 1 د ا‎ 0T اپ “.ف‎ 
hoose Report Source: | Mone z ا‎ 
: Llse the ReportSourcelD property to specify a ReportSource coritrol, |- [Err 
EERE ا‎ Enable Toolbar 


Enable taroup Tree 


Enable Report Yigwy 
Enable Database Logon Prarmpting 
Enable Report Parameter Prompting 


[| Reuse Parameter Yalue On Refreshing Report 


أختر New Report Source‏ لكي تظهر لك liفذةö‏ ÎخرJ Create Report Source‏ 
دع الاسم الافتراضي كما هو 


CrystalReport¥iewer Tasks‏ اا نا 
Choose Report Source: | hone 2 1 |‏ 
Enable Toolbar‏ ل pier:‏ 


Create Repori Sûurce 


create a CrystalReportSouIirce Control 


Lreate a LrystalReportSource that will prowide report content and dala, 


Specify a Lrystal Report For the ZrystalReportSource control 


| 
ErystalReport rp 
TPevy reporb,,. = 
ZEFOWNSE,, = 


ا وقم بتحدیيد الكرستال ريبوت الذي انشأناه مسبقا .. 
من خلال القائمة المنسدلة .. ثم اضغط على)0 


| CrystalRepart.rpt ,*Default.aspx™ | start Page | 


|xoq|aa1 qy, | AO EI AAAS 


a 3 LIISA I1LI 


Create Reporî Source 


wreate a UrystalReportSouIrce Control 


Lrealte a LrystalReportSource that will prowide report content and daka. 


specify a nare For the LrystalReportSource control 


RT E E e e e a mm nn 


| LrystalReportSource1 


بعد ذلك سوف يتصل التقرير مع الداتا بيس .. وسوف يعرض لك الاعمدة في الجدول ومعها بيانات يتم 
عرضها لكي يبن لك انه تم الاتصال 

ملاحظة يتم ادراج بيانات افتراضية في التقرير .. وليس لها علاقة بالجدول ..ولكن فقط يبين لك شكل التقرير 
سيكون بهذا الشكل في العرض وعند التشغيل سوف ترى البيانات الفعلية في الجدول .. 


„ CrystalRepart.rpt , Default.aspx 


ا 


8 100% 3 BusinessObjects 


الان لنجرب التقرير ... 


1A1 FAOUT 

I E Mame li Phone i AdUrESS 

41 liye Saturday Subrepoarî 
141BY Ay Friday Standard 
26 HBA Silyer SUNdAY Form 
AAS hile Sunday Mail Label 
2045 Green Thursday ctandard 
324341 avy ednesday Standard 

A2 Silver Friday Mail Label 
14718 Olive Monday Standard 
ATT Mary Sunday SuUbrepori 
2d1, BBT Red Thursday LfoOss-Tab 


اذهب من خلال القائمة Build‏ واختر Build Solution lia‏ 


 ZrystalRepork ,rpt .„ Default.aspx 


1A1 42O00F 


ID E Mame l Phone i AMAESS 

41 live Saturday Subreporit 
1416 Mavy Friday Standard 
ZB HBA Silver Sunday Forrm 
AZ AST YWhite Sunday Mail Label 
A, AH5 Green Thursday Standard 
32381 May WYeANESHAY Standard 

AMA Silver Friday Mail Label 
14,718 Olive Morıday' Standard 
TAFT Mavy Sunday SuUbreporl 
AS,BBFT Red Thursday Lroass-Tab 


بعد ان تری ان4 Build Succeeded oi‏ 


ا ال أ | 
اتا کیت ی | 8 2 


| Shaw auEpuk fram: Build 


Build started- Project: C-1._ AUebSiteaReport" , Configuration: Debug HET‏ ا و 
Talidalting Usb Silts=‏ 
Euilding Adirsctory ' FUebSIilCEReports#!' |‏ 


Talidatiuon Completes 
==========3 E11ld: 1] suUucZzEEJAJEA or uUp~Tto-dalce, Û failed, lU sEipped =======s=== 


E1 cuutput | ا‎ Error List | 


Build suEEEEAEA 


قم بتشغيل المشروع من خلال الزر للتشغيل 


ET nl | Toanls gm ml orn 


ڊٍ ج kë jpDsbug‏ | ا 


e mam 
¬ ا‎ 


start Debugging |_ 


لكي يتم اظهار البيانات الفعلية التي في الجدول المختار .. 


Z3 Untitled Page - Microsoft Internet Explorer 


Fils Edit  Yiegwy Fayvorites Tools Help 


O sax + ا ا‎ 2 9 ٤ 1 Search < ê Favorites ¢ a - ےا ا ج | خخ‎ e Mb 


Address 3 http: fflocalhast: 3810 YebSiteReport}GeFaull, aspx 


a و کک‎ ۷ I 1F#1 | |] [main Report #| | Fh [100% |  Busiaessobjects 


1AM AFAODOF 


IO E Mame i: Phone 1: AAdIESS 
1 #li Jassim Al Basri 3TH 88 bahrain 

A MiniDiSqgner IENEEINIE ESA, 

3 Ahermd al majed E EA 

4 SYSIEBMSYS 33 E224 

f joseph UUUZAHAE jo 


الان انتهينا من كل شيء .. ولكن ... السؤال يطرح نفسه .. ماذا لو اردت ان اطبع سجل واحد ؟ ماهي 
الطريقة 

وفي هذا الشرح يعرض لنا كل البيانات .. وكذلك الاتصال ليس مربوط بالكود وكذلك قاعدة البيانات .. فهذا 
يعني عندما تقوم بتشغيل المشروع على جهاز أخر سوف لا يتعرف على الداتا بيس .. 

وهذه مشكلة .. 

اذا لنقوم بكتابة الكود لكي يكون التقرير ديناميكي .. وليس البيانات تكون فيه ءأأه†؟S‏ 

اذهب إلى صفحة ال ×مءه.اuںه؟م5‏ واضغط دبل كلك على الصفحة لكي تنفتح لك نافذة الكود... 

إذهب مباشرة إلى أعلى صفحة الكود وقم بكتابة هذه التعريفات للاتصال بقواعد البيانات والكرسيتال ريبوت. 


Imports System.Data. OleDb 

Imports System.Data 

Imports CrystalDecisions.CrystalReports.Engine 
Imports CrystalDecisions. Shared 

Imports System.Collections 


ثم اذهب الى ال Q١2ها]_موه۴‏ وقم بكتابة هذه الكود التالي .. سوف نقوم بالتعديل عليه .. 


Dim rpt As New ReportDocument 
rpt .Load (Server.MapPath ("CrystalReport.rpt") ) 


Dim db As New OleDbConnection ("Provider=Microsoft.JET. OLEDB . 4 
.0;Data Source=" + Server.MapPath (".\\db1.mdb") ) 

db . Open () 

Dim SQLs As String 

SQLs — MI 

Dim ad As New OleDbDataAdapter (SQLs, db) 

Dim da As New DataSet 

ad.Fill (da, "Earth") 


rpt.SetDataSource (da) 

rpt.PrintOptions.PaperOrientation = CrystalDecisions.Shared.P 
aperOrientation.DefaultPaperOrientation 

CrystalReportViewer1l . ReportSource 


rpt 
db.Close () 


ad.Dispose () 
da.Dispose () 


n e e 


کود: 
کما هو موصح... 


/ Default.aspu.yb* CrystaRepart.rpt ; Defauk,aspx™ 


4 (Page Events) | 7 Load 


Imports dwatem, Data, OleDp 
Imports Syatem, Data 
Imports Lrystallecisions.LrEystalReports , Engine 
Imports Lrystallecisionhg . Shared 
Imports System, Collections 
Partial Llass Default 
Inherits System, Weh, U1. Page 


- چ کڪ 


Protected aub Page Load(ByYal sender 4s Uhject, ByVal e 15 Pystem, EventArgs Handles He, Load 
Dim rpt As Hev Reportlocument 


rpt, Load [Server ,HapPath( LrystalReport.,rpt"} | 


Dim dh As Hev OleDhConnection | "Provider=Nicrosoft, JET. OLEDB.4,0:Data Source=" + Server, HapPathl". 1i dbl. mab") | 
dh, pen | | 


Dim PLS As String 

LS = Mf 

Dim ad Aa Hev Olelhlataddapter (PL32, | 
Dim da A2 Hev Datadet 

Ad. Filllda, "tbl Client") 


rpt,petDatasource (a) 


tpt, PrintHptions,Paperrientation = Lryatallecisions, Shared, Paperlr ientat ion, DefaultPaperbr ientat Iol 
LryatalReportViewerl, ReportBource = rpt 


dh,LlosEl) 
ad. Dispose || 
da. DispO3E || 
End Sub 
End Lla33 
.. لاحظ اخي القارئ .. اننا تركنا هذا المتغير فارغ‎ 
کود‎ 
SQLs —. MI 


سوف نقوم باخذ جملة الاستعلام من خلال الكرستال ريبوت .. ونضع له شرط .. 
الان اجعل الكرستال ريبوت هو المحدد حاليا أم۲.٤امممRاهtدراC‏ تم من خلال شريط الادوت الذي يكور 
على الیسار الخاص للکرستال ریبوت ۲٥إoام×ع٤‏ 4ا٥F۴i‏ 


e e e 


اضغط على ۸٥W S۵) Query‏ لكي تظهر لك هذه النافذة 


We bSiteRe port - Microsoft Visual ST u dio 


a 


EFilz= EJiE o "5b siE” Euild GLGe>bıa FoarriaE Tocals ry sEal RFëa 


EEl-- E GUE aba=zë Fizlil= 
Eel Formula Field= 
[TF] FPFararmeEter Fie 
E Group Mame FE 
TE Running Total 
ا‎ SL Expressio 


Database ExperE... 


SEE DalKaSOUF CE LocCcaEion. .. 


Log an or OFF Serwer... 


: "erif DaEab a5 
LEl-- E Special Fields 7 
E Inbound FizelcZ "erif on Ewer PFrirnık 
SH SIL IIE... ج‎ 
FerForm GFOUpINA ON Serer E: Ê 


ا ق 


| 


Fararneter Fields 


- 2 Show SOL Query 


SELEZT EB LliênE . ` IDG, ` EbI Llient. CZ Mame’, Eb Client. TT PhHoNnëE: 
"EBI Client, LZ AAAFESS 
FEO 7 EbI Client EBI TlienE 


قم بنسخ جملة الاستعلام.. لكي نقوم بالتعديل عليها .. الان ارجع إلى صفحة الديفولت .. 
fault .asp×>.‏ Deوقم‏ باسناد جملة الاستعلام إلى المتغير وا56۵ وسوف نسنده بشرط معين بشرط 
رقم ال 1 =| لكي يصبح المتغير قيمة المتغير بهذا الشكل 


HÎ. ات‎ EEE س 2 1 اش‎ . : 
= 8 a j EE س ی‎ 1 100 ES 


1 | ETE : Explorer 


-| 
| 
| 


| 
E‏ 
Ba”‏ 
کت 
Te‏ 
Ea”‏ 
ت 
ا 
أ 
Da‏ 
سو 
2 
س 
س 
= 
N.‏ 
ق 
کا 


1203 PAL 3 


| HENIN a 


کود 
SQLs = "SELECT ‘tbl Client’. ID’, ‘tbl Client .`C_ Name’, ` tbl Client:‏ 
C_Phone’, ‘tbl Client’ .` C_Address’ FROM `tbl1l Client: ` tbl Client:‏ `. 
Where ID=1"‏ 


وبهذه الطريقة انتهينا.. 
قم بتشغيل التقرير .. لكي يظهر لك فقط سجل واحد .. كما هو مبين.. 


i Untitled Page - Microsoft Internet Explorer 


Fil Edit Yiemw: Favorites Tools Help 


x e 33‏ س 2 F]‏ | ف > )¢ E3 3 DBD E f £ 1 Search ê Favorites‏ س 


mm 


Address 8 http: lacalhast: 3810 WebSiteRepartfDefault, aspx 


FF ¥ 1/1 Î |] [main Report ¥] Ê | | Hd [100% Wl BusiaessObleets‏ 4 ي 


1A1 FAUUT 


Û E Marne li; _ Phone li AUIESS 


1 Ali Jassirm Al Basri 3BBFA188 bahraifi 


شرح بعض الاكواد للتوضيح استخدمنا امر 
کود 


Imports System.Data.OleDb 
Imports System.Data 


لتعريف مكتبات الربط بقواعد البيانات 
وكذلك اظهار او اتاحة الخصائص للتقرير 
کود 
Imports CrystalDecisions.CrystalReports.Engine‏ 


Imports CrystalDecisions. Shared 
Imports System.Collections 


عرفنا متغير من نوع م۲ لياخذ خصائص التقرير 
کود 


Dim rpt As New ReportDocument 
rpt.Load (Server.MapPath ("CrystalReport.rpt'") ) 


ومن تم التعرف على مسار التقرير وتحديده .. في الموقع .. 
وهنا 
کود 


n e e 


Dim db As New OleDbConnection ("Provider=Microsoft.JET.OLEDB.4.0;Data 
Source=" + Server.MapPath (".\\App_ Data\\db1 .mdb") ) 

db . Open () 

Dim SQLs As String 

SQLs = "SELECT ‘tbl Client’. ID’, ‘tbl Client’. C_ Name’, ` tbl 
_ Client’ .`C_Phone’, ` tbl Client’ .` C_Address` FROM `tbl1l Client ` tbl 
Client’ Where ID=1 


قمنا بتعرف متغير للاتصال ومن ثم فتحه .. وعرفنا متغير ]ه5 لياخذ لكي يتحفظ بقيمة او بالاحرى يخزن 
جملة الاستعلام في المتغير.. 

ومن ثم عرفنا الادبتر .. لكي يتم تنفيد جملة السكيول 

وعرفنا الداتا ست لكي ياخذ القيم المرجعه من خلال الادبتر.. 

کود 


Dim ad As New OleDbDataAdapter (SQLs, d¦b) 
Dim da As New DataSet 
ad.Fill (da, "tbl Client") 


ثم بعد ذلك اسندنا قبمة الداتا ست الے, التقر یر ۔ لباخذ الببانات مذ 
لم 2 1 پر. س 2 
کود 


rpt.SetDataSource (da) 


ثم بعد ذلك كتبنا هذا الكود التالي لكي يهيئ التقرير للطباعة بالعرض والطول.. 
کود 


rpt.PrintOptions.PaperOrientation = CrystalDecisions.Shared.PaperOrie 
ntation.DefaultPaperOrientation 


ويمكن تجاهل هذا السطر .. 
ثم اسندنا لعارض الكرستال ريبوت مصدر الريبوت وهو ال ام۲ لكي يتعرف على الريبوت 


کود 


CrystalReportViewerl1l .ReportSource = rpt 


ومن ثم اغلاق كلا من 
کود 
db.Close ()‏ 
ad.Dispose ()‏ 
da.Dispose ()‏ 


(٠ 


خلاصة الحديث كله .. انه يمكن تمرير جملة ا5۵ للصفحة سواء مشروطه ام بدون شرط سوف تيم تنفيذها 


وعرضها في التقرير .. وسوف يتم جلب البياانات إلى التقرير سواء سجل واحد او عدة 
سجلات على حسب القيمة المرجعة من الاستعلام .. 


الان الكود بلغة ال آNE.#C‏ 
ضع هذا الكود في اعلى النافذة 


کود 
using System;‏ 
using System.Data;‏ 
using System.Configuration;‏ 
using System. Web;‏ 
using System.Web. Security;‏ 
using System.Web.UI;‏ 
using System.Web. UI1I.WebControls;‏ 
using System.Web. UI.WebControls.WebParts;‏ 
using System.Web.UI.HtmlControls;‏ 
using System.Data. OleDb;‏ 
using CrystalDecisions.CrystalReports.Engine;‏ 
using CrystalDecisions. Shared;‏ 
using System.Collections;‏ 
وضع هذا الكود في لإaةما_ع٥gوP۴a‏ 
ReportDocument rpt = new ReportDocument () ;‏ 
rpt .Load (Server.MapPath ("CrystalReport.rpt"));‏ 
String SQLs;‏ 
SQLs = "SELECT ‘tbl Client’. ID’, ` tbl Client’. C_ Name’, ` tbl‏ 
_Client’ .`C_Phone’, ` tbl Client’ .` C_Address` FROM `tbl1l Client’ ` tbl _‏ 
Client’ Where ID=1"; String strConnection = "Provider=Microsoft. Jet.‏ 


OLEDB.4.0 ;Data Source=" + Server.MapPath (".\\App_Data\\db1 .mdb") ; 


/create a new OleDbConnection object using the connection string 
OleDbConnection objJConnect = new OleDbConnection (strConnection) ; 
//open the connection to the database 
objConnect . Open () ; 
OleDbDataAdapter ad = new OleDbDataAdapter (SQLs, objJConnect) ; 
DataSet da = new DataSet () ; 
ad.Fill (da, "tbl Client") ; 


rpt.SetDataSource (da) ; 
rpt.PrintOptions.PaperOrientation 


CrystalDecisions.Shared.P 


/ 


aperOrientation.DefaultPaperOrientation; 


CrystalReportViewer1l . ReportSource Fp; 
objConnect.Close () ; 

ad.Dispose () ; 

da.Dispose () ; 


٠‏ هل تعتبر ".۸8۲۴ لغة برمجية أم تقنية ؟ وما هي التقنيات المكونة ل ۸8S۲."‏ ؟ 


لا تعتبر ۸5۲.«٥٤‏ لغة برمجية وإنما هي تقنية تتكون من مجموعة من التقنيات التي تستخدم لتطوير 
مواقع ديناميكية. 
يعتبر الات من ممكونات هذة التقنية: 
١‏ بيئة ال .NE1‏ 
۲- أحد اللغات البرمجية عالية المستوى ( (VB.net, C#, C++.net, J#‏ 
¥- lژڑGlت‏ awرڍڊٽ (JavaScript, Jscript, VBScript)‏ 
XML -‘‏ 
ADO.NET -®‏ 
Cascading Style Sheet CSS -1‏ 
۷- مكونات تستخدم في التطوير: 
Visual Studio.net چaliرڊ .a‏ 
ط. خادم الويب 118 


خاتمه۰ 


الى هذا الحد قد وصلنا الى نهاية هذا الموضوع › أرجو من الله أن يكون مفيداً وأن أكون قد 
ساهمت في زيادة المعرفة و لو بشي يسير. وأتمنى ممن يجد خطأ أن يبلغني به › ومن لديه 
فائدة فليتحفني بها وكما ذكرت سابقاً في البداية وأكرر في النهاية فضلاً لو وجدت أي خطأ في 
الكود أوخطأ إملائي فسأكون في غاية السعادة لو راسلتني به على بريدي الالكتروني. 


Email: - nabil]299 @ Gmall .Com 


ملاحظة :- الذي يريد عمل مشاريع تخرج بالتقنية الذهبية ۸5۲.×N ٤13.5‏ أو امuوا۷‏ 
8 «٥iهںاS‏ عليه مراسلتي على الايميل أو الاتصال بهذا الرقم 


770335 967+ 
أكرر شكري مرة أخرى لكل من ساهم أو دعمني في كتابة هذا الموضوع . 
وصلى الله وسلم على نبينا محمد وعلى آله وصحبه أجمعمين 


والحمدلله رب العالمين . 


ل ا 


